From: Michael Albinus Date: Fri, 9 Mar 2012 22:06:09 +0000 (+0100) Subject: * net/dbus.el: (dbus-property-handler): Return empty array if X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~503 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=00b912ee275f7c669c7279d8702f40c4b12af281;p=emacs.git * net/dbus.el: (dbus-property-handler): Return empty array if there are no properties. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7b9e00782b5..5a439d63036 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2012-03-09 Michael Albinus + + * net/dbus.el: (dbus-property-handler): Return empty array if + there are no properties. + 2012-03-09 Leo Liu * savehist.el (savehist-printable): Stricter check for string diff --git a/lisp/net/dbus.el b/lisp/net/dbus.el index fbc83bf1df0..feef78a305f 100644 --- a/lisp/net/dbus.el +++ b/lisp/net/dbus.el @@ -1039,7 +1039,8 @@ It will be registered for all objects created by `dbus-register-object'." (car (last key)) (list :variant (cdar (last (car val)))))))) dbus-registered-objects-table) - (list result)))))) + ;; Return the result, or an empty array. + (list :array (or result '(:signature "{sv}")))))))) ;; Initialize :system and :session buses. This adds their file